Asymetrix Multimedia Toolbook 4.0 (CBT Edition)

home *** CD-ROM | disk | FTP | other *** search

/ Asymetrix Multimedia Toolbook 4.0 (CBT Edition) / Asymetric Multimedia Toolbook 4.0 (CBT Edition).iso / ctb40ap.z / EVALBOOK.SPB (.txt) < prev next >

Wrap

Asymetrix ToolBook File | 1996-01-10 | 71KB | 1,157 lines

P 8 8 L *ClassTbl* *ClassEntry* *PTABLE* *WINDOWSEG* *ICONRESTAB* *ICONRESSEG* *ICONRES* Background *OBJTABLE* *IDTABLE* *NAMETAB* Rectangle Ellipse RoundedRectangle Polygon IrregularPolygon AngledLine Curve PaintObject Picture Group Stage Button Viewer ComboBox Field RecordField Hotword *RHOTWORD* *TbxBase* TB40HYP.SBK 8 " 8 ewer bxBase* , 8 bxBase* digitalVideo waveAudio cdAudio animation bitamp sequencer photoCD videoDisk overlay FALSE wwwwp wwwww wwwwwp COPYARGS CREATEIC COPYARGS CREATEIC{ COPYARGS CREATEIC TTTT^ EDEE^ TDDT^ COPYARGS CREATEICc COPYARGS CREATEIC COPYARGS CREATEICK COPYARGS CREATEIC COPYARGS CREATEIC3 COPYARGS CREATEIC &File &Open Ctrl+O &Save Ctrl+S Save &As... saveas &Import... import &Export... export Print Set&up... printsetup &Print Pages... Ctrl+P printpages Prin&t Report... printreport Send &Mail... sendmail &Run... E&xit Alt+F4 &Edit &Undo Ctrl+Z Cu&t Ctrl+X &Copy Ctrl+C &Paste Ctrl+V paste C&lear Del clear &Select All Shift+F9 selectall S&elect Page Shift+F12 selectpage F&ind... F5 search Re&place... replace &Author F3 author &Text &Character... F6 character &Paragraph... F7 paragraph Plai&n plain &Bold Ctrl+B I&talic Ctrl+T italic Under&line Ctrl+L underline Stri&keout Ctrl+K strikeout S&uper/subscript super/subscript &Normal script normalscript Su&bscript subscript Su&perscript superscript &Show Hotwords F9 showhotwords &Page &Next Alt+Right P&revious Alt+Left previous &First Alt+Up first &Last Alt+Down &Back Shift+F2 &History... Ctrl+F2 history N&ew Page Ctrl+N newpage &Help &Contents F1 index &Search for Help On... glossary &Tutorial tutorial &How To Use Help usinghelp &Keyboard keyboard C&ommands commands &About ToolBook... abouttoolbook p>#6#6# TLHighlight sizedObj Border Highlight2 TRShadow TabShadow2 Shadow Highlight Shadow2 TabShadow resize resizeBorder w, #? resize regular _CurrentTab active tab area _CurrentTab ]$baseRad tbk_wid_currentTab _CurrentTab tbk_wid_currentTab .'+ +F w, #? w, #? .'+ +F Tab number must be 2 to 7. ownerObj regular of background id tab 1 tbk_wid_numTabs oldNum seedgrp tbk_wid_numTabs tbk_wid_numTabs -#, #? ^$baseRad resizeTab resize sizedObj tabHeigth currentTab tbk_wid_tabHeight _CurrentTab active tab area _CurrentTab tabHeight sized TLHighlight TRShadow Shadow Highlight border resizeTab tabFolder propsRead "tbk_wid_currentTab readObjProps enterPage .'+ +F propType propType field,recordfield,button,group,combobox s_wid_targetWindow s_wid_targetObject propType s_wid_targetWindow s_wid_targetObject oType propName propsRead propValue oType propName readObjProps .'+ +F ,&H.& propType propType field,recordfield,button,group,combobox afterEdit ASYM_W s_wid_targetObject propValue s_wid_targetWindow ASYM_Reset tbk_wid_name propType s_wid_targetWindow s_wid_targetObject oType propValue propName default oType propName propValue Cancel resize x1,y1,x2,y2, tx1,ty1,tx2,ty2,xp,yp,baseRad ssm = sysSuspendMessages sol = lockScreen targetWindow sizedObj = rad = n * xp m"Border" D,y1, x2,y2, x1,y2, x1, -1) * xp m"Highlight" x1+xp,y2-yp, x1+xp,ty2+yp, tx1+xp, +yp, +xp,y1+yp, tx2- -xp,y1+yp +yp, x2-xp, m"TabShadow" Mrad-xp,y1+yp, ]xp,ty1+ +yp, x2-xp, x2-xp,y2-yp, x1+xp,y2-yp +2) * xp U"TLHighlight" ,y1+xp U"TRShadow" +xp,y1+xp, xp,y1+ - 2) * xp xOff = xp*2; yOff = yp*2 m"Highlight2" 6,y2- /, x1+ `,y1+rad+ t,y1+ w-xp,y1+ , x2- m"TabShadow2" Off, x2- , x1+ = ssm = sol resizeBorder tbk_wid_currentTab Zlogical ssm,sol x1,y1,x2,y2,tx1,ty1,tx2,ty2 n = _CurrentTab Q = sysSuspendMessages o = lockScreen targetWindow 9" && n) resize x1,y1,x2,y2, obaseRad 9area" 9" && regular = ssm = sol -- Action here flushMessageQueue() tbk_wid_numTabs n < 2 n > 7 zmust be 2 isOnBackground = onBackground ownerObj = oldNum = seedgrp = duplicate 9" && 9" && sized ) - 1 x1,y1,x2,y2, tabWidth,tabHeight, , i, rightx ssm = sol = sizedObj = yp = sysPageUnitsPerPixel = tbk_wid_tabHeight tabHeigth = 240; ) - 1 = (x2-x1) / x = (i - 1) * + x1 9" && i) = x+ = x2 resizeTab grp, x,y1, , y1+ xp,yp, tx1 = x; ty1 = y1; tx2 = ; ty2 = y1+ ,xp,yp, = ssm = sol x1,y1+30,x2,y2 m"border" x1,y2, x1,y1+Rad, x1+ y1, x2- y1, x2,y1+ x2,y2 { = ( +2) * xp U"TRShadow" ,y1, x2,y1+ -1) * xp U"TLHighlight" x1+1,y1+ , x1+ ,y1+1 Hxp; rad = ( - 1) * xp x1,y2, x1,y1+ 1, x1+ 8,y1, x2- y1, x2,y1+ tbk_wid_currentTab "tabFolder" propsRead readObjProps o<> 1 -- Get property settings -- If a has a "propValue" -- use that value same -- dialog {. Checked checkboxes can be used %such. 4s_wid_targetObject, s_wid_targetWindow ' = NULL bg = y; pg = objs = getObjectList(pg," ,combobox", propType = oType = propName = " && "&& " " && pg = -- Where they differ {, change -- If a {. Unactivated bg = pg = t(pg," " && " && QUOTE " && " && && " " && tbk_wid_name = "ASYM_W" ASYM_Reset "afterEdit" close = default Cancel default button author skrefFocus cancelBtn refBtn keyChar Cancel cancelBtn refBtn defBtn skrefFocus ASYM_IsWin31 enterPage skrefFocus setDefButton refBtn wordwrap button field skrefFocus pushbutton cancelBtn defBtn rkrefFocus notifybefore notifyafter x = 13 orefBtn enabled buttonClick orefFocus x = 27 ocancelBtn notifyBefore B"Cancel" odefBtn = B"OK" ASYM_IsWin31() u= "pushbutton" setDefButton btn wrd1 = NULL OK = ( fieldType wordwrap) targetWindow = u = sysPageUnitsPerPixel b = b - x, b - y, b + x, b + y 8/26/94 2:48:42 PM ASYM_LogName Claude Ostyn Score Book Widget Properties Sans Serif Mike Florence Mike Florence Mike Florence Mike Florence Claude Ostyn <BookPath> info_LastSaved Mike Florence Mike Florence Mike Florence Mike Florence 9/21/94 4:25:55 PM INFO_Title Mike Florence 10/7/94 9:48:47 AM 9/23/94 5:29:41 PM Score Book Question Properties Mike Florence Mike Florence Mike Florence 1/25/95 9:49:58 AM <auto> ASYM_AuthorResetPrompt _tbk_HyperPath 12/8/95 5:18:05 PM ASYM_LogAppend :HDMEDIAPATH Arial Sans Serif Sans Serif San Serif lastUnits frameUpdate lastUnits enterpage frameUpdate sysPageUnitsPerPixel <> lastUnits e = TRUE frameUpdate e= FALSE MS Sans Serif Asymetrix Corporation de Ostyn 12/8/95 5:18:18 PM MS Sans Serif ASYM_LogEncrypt info_LastSavedBy lastUnits frameUpdate lastUnits enterpage frameUpdate .'+ +F ,&H.& propsRead ASYM_WorkWindow s_wid_targetObject widget1 readObjProps s_wid_targetWindow enterBook -- Resolution fixups prettier 3D graphics sysPageUnitsPerPixel <> lastUnits oldLock = e = TRUE frameUpdate 4s_wid_targetObject, s_wid_targetWindow = NULL ( = ASYM_WorkWindow() [propsRead readObjProps /"widget1" 12/14/95 9:05:30 PM ialog Feedback Text Page "clipChooser" Widget Props Page "general" Score Book Widget Properties SubDialog Set Score Options ge id 17 of Book "G:\MTB40\WIDGETS\EVALBOOK.SPB" Page id 13 Score Multiple Choice #1 Evaluator Properties general s_wid_TargetWindow Button s_wid_targetObject firstIdle firstIdle 4s_wid_TargetWindow,s_wid_targetObject v = shownBy 15,15 lastUnits Object name: object: 3dField tbk_wid_type propValue propValue propValue string propType (unnamed) explanation Use this widget on the last page of a book to add up the book score, mark the book as completed, etc. widget1 Choice1 ansArray 94080216125214593175116 ASYM_TpID defaultButton Button id 81 of Background id 0 defBtn needFix Button id 82 of Background id 0 cancelBtn Button id 81 of Background id 0 refFocus Button id 81 of Background id 0 refBtn buttonClick buttonClick default cancel buttonclick buttonclick close Cancel %ASYM_WinHelp actions general buttonclick keyDown buttonclick = "general" ASYM_WinHelp(1000,"") = "actions" -10,"") notifyBefore TabFolder tabHeight tbk_Wid_CurrentTab _CurrentTab baseRad tbk_wid_tabHeight Active tab area d x [ 3dTabBase tbk_wid_type Highlight2 Highlight TRShadow Border Highlight TabShadow Shadow TLHighlight TabShadow2 Shadow2 Highlight2 Tab 1 "tbk_wid_currentTab buttonClick buttonClick tbk_wid_currentTab 3dTabc tbk_wid_type tabBtn General TLHighlight TRShadow Border Highlight Shadow Tab 2 "tbk_wid_currentTab buttonClick buttonClick tbk_wid_currentTab 3dTabc tbk_wid_type tabBtn Actions TLHighlight TRShadow Border Highlight Shadow keyDown author enterPage keyChar Actions 15,15 lastUnits (unnamed) ASYM_reset notifyBefore ASYM_reset sized 3DGroupBox tbk_wid_type Automatically repairs itself when sized. ASYM_WID_Description Asymetrix ASYM_WID_Author 95-1-25 ASYM_WID_CreateDate Shadow Highlight Question feedback group Caption Actions when clicked ASYM_WID_ShowScore score propValue propValue score buttonClick propValue Z= (x = TRUE) enabled "score" buttonClick propType Add up score for all questions and display as: score ASYM_WID_ScoreMode modal subDialog Soptions options ASYM_WID_ScoreMode Soptions Set Score Options propValue ASYM_ShowDialog ScoreOptions propValue status buttonUp objectfrompoint( ) <> --lockScreen options "ScoreOptions" = propValue "ASYM_WID_ScoreMode" defaultPage "subDialog" = status = ASYM_ShowDialog(" r,"Set x, "modal") isOpen close Click to select file helpText exclude ASYM_WID_ScoreMode ASYM_GetString decimal Rounded to %1 places Percentage of maximum score score 6/ASYMA_GetAuthorIni percent Widget options Rounded integer value value,0 trueValue propValue trueValue propValue n9ASYMA_SetAuthorIni score Widget options trueValue propValue = ASYMA_GetAuthorIni("Widget options","score") M = "percent" otrueValue "value,0" = ASYM_GetString("Rounded integer 4Percentage maximum = expandString( %1 places"), notifyBefore OK ASYMA_SetAuthorIni(" propType percent,0 trueValue Percentage of maximum scoreons ASYM_WID_MarkCompleted propValue propValue buttonClick propValue Z= (x = TRUE) enabled "mark" buttonClick propType Mark course as completed in the CMS ASYM_WID_CompletedConditions trueText propValue ,"JdY trueText If all navigable pages visited PagesNavigated ASYM_GetString Mark unconditionally If module score is at least %1 percent propValue propValue otrueText ' = ASYM_GetString("Mark unconditionally") isType(REAL, mask = @If module score )least %1 percent") = expandString( * 100) PagesNavigated","If navigable visited") expression propType propValue PagesNavigated trueText If all navigable pages visited percentercent ASYM_WID_CompletedConditions 4YCompletedConditions MarkAsCompleted Conditions Conds propValue CondsFld propValue buttonUp objectfrompoint( ) <> CondsFld = = CompletedConditions(propValue "MarkAsCompleted V <> conds Click to select file helpText exclude cms label (requires the Course Management System) ASYM_WID_IgnoreSkipped false propValue propValue propValue propType Ignore pages with "skipNavigation" when adding up score ASYM_WID_LockAnswer propValue propValue propValue propType Lock all scored questions to prevent further responses ASYM_WID_ResetTarget propValue propValue propValue propType Reset all questions ASYM_WID_Msg osmsg propValue propValue osmsg buttonClick propValue Z= (x = TRUE) enabled "osmsg" buttonClick propType Send OpenScript: osmsg ASYM_WID_MsgText propValue propValue propValue proptype ASYM_WID_MsgText OSMsg ASYMA_EditFeedbackOSMessage OSMsgFld buttonUp objectfrompoint( ) <> OSMsgFld = = ASYMA_EditFeedbackOSMessage( > <> Click to select file helpText exclude ASYM_reset ScoreOptions 15,15 lastUnits Select the desired formatting to be applied to the score.fter a response. (unnamed) 3DGroupBox tbk_wid_type Automatically repairs itself when sized. ASYM_WID_Description Asymetrix ASYM_WID_Author 94-10-17 ASYM_WID_CreateDate Shadow Highlight Caption Format Options options w_options decimal buttonclick .', 7 w_options decimal flddec options w_options options buttonclick enabled _options = FALSE = TRUE 1 = NULL B = 0 flddec = percent,0 _options value Rounded integer value percent Percent of maximum score decimal decimal buttonClick buttonClick Rounded to 3dField tbk_wid_type _options decimal w_options options w_options leavefield xisType(real, _options propType places dialogs CANCEL button "CANCEL" of field single button "OK" of syscuror default keyDown -- generic dialog handler -- test Bexits so, does action isObject(" B""CANCEL"" buttonclick syscuror = default n = keyEnter B""OK"" = NULL "single" fieldType B"OK" 94080216150514626234020 ASYM_TpID defaultButton Button id 1 of Background id 4 defBtn needFix Button id 2 of Background id 4 cancelBtn Button id 3 of Background id 4 refFocus Button id 3 of Background id 4 refBtn buttonClick buttonClick default cancel buttonClick buttonClick close escape Cancel %ASYM_WinHelp buttonclick keyDown buttonclick ASYM_WinHelp(1020,"") notifyBefore author enterPage keyDown keyChar MarkAsCompleted Conditions Conditions subDialog propValue s__kaiganichild 7wASYM_Container CompletedConditions n9ASYMA_SetAuthorIni minBookScore propValue Conditions Scoring closeThisWindow minScore s__kaiganichild closeThisWindow cancel closeThisWindow CompletedConditions conds 4s__kaiganichild v = "subDialog" ASYM_Container( defaultPage propValue %modal "OK" "minScore" isType(REAL, ASYMA_SetAuthorIni("Scoring","minBookScore", closeThisWindow 15,15 lastUnits Mark this module as completed if... Conditions ,"JdY button choice MinScore 7wASYM_Container propValue ,"JdY choice MinScore 7wASYM_Container propValue choice minScore buttonClick propValue fld = "MinScore" ASYM_Container( isType(REAL, _ * 100 enabled z = " ochoice = = .75 / 100 buttonClick "minScore" = ( percent,0 _options PagesNavigated choice No special conditions minScore 6/ASYMA_GetAuthorIni minBookScore Scoring buttonClick buttonClick fld = enabled 0ASYMA_GetAuthorIni ("Scoring","minBookScore",80) The total score is at least: PagesNavigated All the navigable pages in the book have been visited (unnamed) sized sized 3dField tbk_wid_type Automatically repairs itself when sized. ASYM_WID_Description Asymetrix ASYM_WID_Author 95-1-25 ASYM_WID_CreateDate MinScore leavePage notifyAfter leavePage dialogs CANCEL button "CANCEL" of field single button "OK" of syscuror default keyDown -- generic dialog handler -- test Bexits so, does action isObject(" B""CANCEL"" buttonclick syscuror = default n = keyEnter B""OK"" = NULL "single" fieldType B"OK" 94080216150514626234020 ASYM_TpID defaultButton Button id 1 of Background id 5 defBtn needFix Button id 2 of Background id 5 cancelBtn Button id 3 of Background id 5 refFocus Button id 3 of Background id 5 refBtn buttonClick buttonClick default cancel cancel buttonClick buttonClick escape Cancel %ASYM_WinHelp buttonclick keyDown buttonclick ASYM_WinHelp(1000,"") notifyBefore author enterPage keyDown keyChar ScoreOptions MarkAsCompleted Conditions Actions general dialogs widget1